home *** CD-ROM | disk | FTP | other *** search
/ PCMania 34 / PCMania CD34.iso / pictpub / install / ppini.inc < prev    next >
Encoding:
Text File  |  1994-12-07  |  13.5 KB  |  223 lines
  1. DECLARE SUB CreatePrintStyNamesEntries(ini$)
  2. DECLARE SUB CreateOptStyleNamesEntries(ini$)
  3. DECLARE SUB CreatePPINIKeyEntries (ini$)
  4. DECLARE SUB CreateOptScanNamesEntries(ini$)
  5.  
  6.  
  7. '*************************************************************************
  8. SUB CreateOptScanNamesEntries(ini$) STATIC
  9.  
  10. szName$="Scanner"
  11. CreateIniKeyValue ini$, szName$, "AVR SCSI", "AVRSCSI.DSC", cmoNone
  12. CreateIniKeyValue ini$, szName$, "Canon IX-30F", "CANON.DSC", cmoNone
  13. CreateIniKeyValue ini$, szName$, "Envision ENV6000", "TAMARACK.DSC", cmoNone
  14. CreateIniKeyValue ini$, szName$, "Envision ENV8000", "TAMARACK.DSC", cmoNone
  15. CreateIniKeyValue ini$, szName$, "Epson Parallel v1 300", "EPSON.DSC", cmoNone
  16. CreateIniKeyValue ini$, szName$, "Epson Parallel", "EPSONLPT.DSC", cmoNone
  17. CreateIniKeyValue ini$, szName$, "Epson SCSI", "EPSNASPI.DSC", cmoNone
  18. CreateIniKeyValue ini$, szName$, "HP ScanJet+", "HP.DSC", cmoNone
  19. CreateIniKeyValue ini$, szName$, "HP ScanJet IIC", "HP.DSC", cmoNone
  20. CreateIniKeyValue ini$, szName$, "Howtek PC", "HOWTEK.DSC", cmoNone
  21. CreateIniKeyValue ini$, szName$, "Howtek SM3/3+", "SM3.DSC", cmoNone
  22. CreateIniKeyValue ini$, szName$, "Microtek 300G", "MICROTEK.DSC", cmoNone
  23. CreateIniKeyValue ini$, szName$, "Microtek 300Z", "MICROTEK.DSC", cmoNone
  24. CreateIniKeyValue ini$, szName$, "Microtek 600G", "MICROTEK.DSC", cmoNone
  25. CreateIniKeyValue ini$, szName$, "Microtek 600Z", "MICROTEK.DSC", cmoNone
  26. CreateIniKeyValue ini$, szName$, "Microtek SM II", "SCANMKR2.DSC", cmoNone
  27. CreateIniKeyValue ini$, szName$, "Mustek MFS-3000C", "MUSTEKA4.DSC", cmoNone
  28. CreateIniKeyValue ini$, szName$, "Mustek MFS-6000C", "MUSTEKA4.DSC", cmoNone
  29. CreateIniKeyValue ini$, szName$, "Nikon 3510AF Slide", "NIK3510.DGR", cmoNone
  30. CreateIniKeyValue ini$, szName$, "Relisys 600 color", "REL600.DSC", cmoNone
  31. CreateIniKeyValue ini$, szName$, "Relisys 800 color", "REL800.DSC", cmoNone
  32. CreateIniKeyValue ini$, szName$, "Ricoh IS-50", "RICOH.DSC", cmoNone
  33. CreateIniKeyValue ini$, szName$, "Ricoh IS-50 (SCSI)", "RICOHS.DSC", cmoNone
  34. CreateIniKeyValue ini$, szName$, "Ricoh IS-60", "RICOH.DSC", cmoNone
  35. CreateIniKeyValue ini$, szName$, "Ricoh IS-60 (SCSI)", "RICOHS.DSC", cmoNone
  36. CreateIniKeyValue ini$, szName$, "Ricoh FS-1 (SCSI)", "RICOHS.DSC", cmoNone
  37. CreateIniKeyValue ini$, szName$, "Sharp JX-300 color (GPIB)", "JX300.DSC", cmoNone
  38. CreateIniKeyValue ini$, szName$, "Sharp JX-320 color (GPIB)", "JX320.DSC", cmoNone
  39. CreateIniKeyValue ini$, szName$, "Sharp JX-600 color (GPIB)", "JX320.DSC", cmoNone
  40. CreateIniKeyValue ini$, szName$, "Tamarack", "TAMARACK.DSC", cmoNone
  41. CreateIniKeyValue ini$, szName$, "Umax OA-1", "UMAX.DSC", cmoNone
  42. CreateIniKeyValue ini$, szName$, "Umax UG80", "UMAX.DSC", cmoNone
  43. CreateIniKeyValue ini$, szName$, "Umax UC300", "UMAX.DSC", cmoNone
  44. CreateIniKeyValue ini$, szName$, "Umax UG630", "UMAX.DSC", cmoNone
  45. CreateIniKeyValue ini$, szName$, "Umax UC630", "UMAX.DSC", cmoNone
  46. CreateIniKeyValue ini$, szName$, "Umax UC840", "UMAX.DSC", cmoNone
  47. CreateIniKeyValue ini$, szName$, "Umax UC1200S", "UMAX.DSC", cmoNone
  48.  
  49. END SUB
  50. '*************************************************************************
  51. SUB CreatePPINIKeyEntries (ini$) STATIC
  52. szName$="Picture Publisher"
  53. szCustT$="CustToolBox"
  54. CreateIniKeyValue ini$, szName$, "Maximized", "1", cmoOverwrite
  55. CreateIniKeyValue ini$, szName$, "UsePrinterScreening", "1", cmoOverwrite
  56. CreateIniKeyValue ini$, szName$, "OLE", "1", cmoOverwrite
  57. CreateIniKeyValue ini$, szName$, "szPalette", "Default Palette", cmoNone
  58. CreateIniKeyValue ini$, szName$, "NumCustomToolBoxes", "15", cmoNone
  59. CreateIniKeyValue ini$, szName$, "StartMacro", "(None)", cmoOverwrite
  60. CreateIniKeyValue ini$, szName$, "xImage", "44", cmoOverwrite
  61. CreateIniKeyValue ini$, szName$, "yImage", "4", cmoOverwrite
  62. CreateIniKeyValue ini$, szName$, szCustT$+"0", "0,Compositing", cmoNone
  63. CreateIniKeyValue ini$, szName$, szCustT$+"1", "0,Fill Tools", cmoNone
  64. CreateIniKeyValue ini$, szName$, szCustT$+"2", "0,Edit Commands", cmoNone
  65. CreateIniKeyValue ini$, szName$, szCustT$+"3", "0,Image I/O", cmoNone
  66. CreateIniKeyValue ini$, szName$, szCustT$+"4", "0,Macro Commands", cmoNone
  67. CreateIniKeyValue ini$, szName$, szCustT$+"5", "0,Map Commands", cmoNone
  68. CreateIniKeyValue ini$, szName$, szCustT$+"6", "0,Masking Commands", cmoNone
  69. CreateIniKeyValue ini$, szName$, szCustT$+"7", "0,Masking Tools", cmoNone
  70. CreateIniKeyValue ini$, szName$, szCustT$+"8", "0,Mode Change", cmoNone
  71. CreateIniKeyValue ini$, szName$, szCustT$+"9", "0,Object Commands", cmoNone
  72. CreateIniKeyValue ini$, szName$, szCustT$+"10", "0,Options", cmoNone
  73. CreateIniKeyValue ini$, szName$, szCustT$+"11", "0,Retouch Tools", cmoNone
  74. CreateIniKeyValue ini$, szName$, szCustT$+"12", "0,Transformation", cmoNone
  75. CreateIniKeyValue ini$, szName$, szCustT$+"13", "0,Undo Tools", cmoNone
  76. CreateIniKeyValue ini$, szName$, szCustT$+"14", "1,Main", cmoNone
  77. END SUB
  78.  
  79. SUB CreateOptStyleNamesEntries(ini$) STATIC
  80. szName$="PaintStyle"
  81. CreateIniKeyValue ini$, szName$, "Solid", "solid.mbs", cmoNone
  82. CreateIniKeyValue ini$, szName$, "Solid (Overlap)", "solido.mbs", cmoNone
  83. CreateIniKeyValue ini$, szName$, "Brushed Oils", "brushed.mbs", cmoNone
  84. CreateIniKeyValue ini$, szName$, "Chalk", "chalk.mbs", cmoNone
  85. CreateIniKeyValue ini$, szName$, "Colorizer", "colorize.mbs", cmoNone
  86. CreateIniKeyValue ini$, szName$, "Crayon", "crayon.mbs", cmoNone
  87. CreateIniKeyValue ini$, szName$, "Distort", "Distort.mbs", cmoNone
  88. CreateIniKeyValue ini$, szName$, "Dots", "dots.mbs", cmoNone
  89. CreateIniKeyValue ini$, szName$, "Marker", "marker.mbs", cmoNone
  90. CreateIniKeyValue ini$, szName$, "Oil Pastels", "LightOil.mbs", cmoNone
  91. CreateIniKeyValue ini$, szName$, "Oil Paint", "wetpaint.mbs", cmoNone
  92. CreateIniKeyValue ini$, szName$, "Pencil", "pencil.mbs", cmoNone
  93. CreateIniKeyValue ini$, szName$, "Scatter", "scatter.mbs", cmoNone
  94. CreateIniKeyValue ini$, szName$, "Scatter (Overlap)", "scattero.mbs", cmoNone
  95. CreateIniKeyValue ini$, szName$, "Smudgy Marker", "smarker.mbs", cmoNone
  96. CreateIniKeyValue ini$, szName$, "Sponge", "Sponge.mbs", cmoNone
  97. CreateIniKeyValue ini$, szName$, "WaterColor", "watercol.mbs", cmoNone
  98. szName$="SprayStyle"
  99. CreateIniKeyValue ini$, szName$, "Solid", "absolid.mbs", cmoNone
  100. CreateIniKeyValue ini$, szName$, "Scatter", "abscatt.mbs", cmoNone
  101. CreateIniKeyValue ini$, szName$, "Wet Solid", "abwetsol.mbs", cmoNone
  102. CreateIniKeyValue ini$, szName$, "Wet Scatter", "abwetsct.mbs", cmoNone
  103. szName$="CloneStyle"
  104. CreateIniKeyValue ini$, szName$, "Standard(Overlap)", "Standar0.mbs", cmoNone
  105. CreateIniKeyValue ini$, szName$, "Scattered(Overlap)", "Scatter0.mbs", cmoNone
  106. CreateIniKeyValue ini$, szName$, "Standard", "clone.mbs", cmoNone
  107. CreateIniKeyValue ini$, szName$, "Scattered", "Standard.mbs", cmoNone
  108. CreateIniKeyValue ini$, szName$, "Mirror H(Overlap)", "MirrorHo.mbs", cmoNone
  109. CreateIniKeyValue ini$, szName$, "Mirror V(Overlap)", "MirrorVe.mbs", cmoNone
  110. CreateIniKeyValue ini$, szName$, "Mirror B(Overlap)", "MirrorBo.mbs", cmoNone
  111. CreateIniKeyValue ini$, szName$, "Mirror Horizontal", "cloneh.mbs", cmoNone
  112. CreateIniKeyValue ini$, szName$, "Mirror Vertical", "clonev.mbs", cmoNone
  113. CreateIniKeyValue ini$, szName$, "Mirror Both", "clonehv.mbs", cmoNone
  114. szName$="SmearStyle"
  115. CreateIniKeyValue ini$, szName$, "Solid", "smsolid.mbs", cmoNone
  116. CreateIniKeyValue ini$, szName$, "Scatter", "smscatt.mbs", cmoNone
  117. CreateIniKeyValue ini$, szName$, "Dry Brush Light", "Light.mbs", cmoNone
  118. CreateIniKeyValue ini$, szName$, "Dry Brush Medium", "DryBrus0.mbs", cmoNone
  119. CreateIniKeyValue ini$, szName$, "Dry Brush Heavy", "Distort0.mbs", cmoNone
  120. szName$="SharpStyle"
  121. CreateIniKeyValue ini$, szName$, "Default", "sharpen.mbs", cmoNone
  122. szName$="SmoothStyle"
  123. CreateIniKeyValue ini$, "SmoothStyle", "Default", "smooth.mbs", cmoNone
  124. szName$="LightenStyle"
  125. CreateIniKeyValue ini$, szName$, "All Tones", "lighten.mbs", cmoNone
  126. CreateIniKeyValue ini$, szName$, "Highlights", "lightenh.mbs", cmoNone
  127. CreateIniKeyValue ini$, szName$, "Midtones", "lightenm.mbs", cmoNone
  128. CreateIniKeyValue ini$, szName$, "Shadows", "lightens.mbs", cmoNone
  129. szName$="DarkenStyle"
  130. CreateIniKeyValue ini$, szName$, "All Tones", "darken.mbs", cmoNone
  131. CreateIniKeyValue ini$, szName$, "Highlights", "darkenh.mbs", cmoNone
  132. CreateIniKeyValue ini$, szName$, "Midtones", "darkenm.mbs", cmoNone
  133. CreateIniKeyValue ini$, szName$, "Shadows", "darkens.mbs", cmoNone
  134. szName$="EraserStyle"
  135. CreateIniKeyValue ini$, szName$, "Airbrush Undo", "eraseair.mbs", cmoNone
  136. CreateIniKeyValue ini$, szName$, "Undo", "eraser.mbs", cmoNone
  137. CreateIniKeyValue ini$, szName$, "White", "eraswhit.mbs", cmoNone
  138. CreateIniKeyValue ini$, szName$, "Background", "erasback.mbs", cmoNone
  139. szName$="DrawShapeStyle"
  140. CreateIniKeyValue ini$, szName$, "Solid", "drsolid.mbs", cmoNone
  141. CreateIniKeyValue ini$, szName$, "Scatter", "drscatt.mbs", cmoNone
  142. CreateIniKeyValue ini$, szName$, "Dotted", "drdotted.mbs", cmoNone
  143. szName$="DrawFreeStyle"
  144. CreateIniKeyValue ini$, szName$, "Solid", "plsolid.mbs", cmoNone
  145. CreateIniKeyValue ini$, szName$, "Scatter", "plscatt.mbs", cmoNone
  146. CreateIniKeyValue ini$, szName$, "Dotted", "pldotted.mbs", cmoNone
  147. szName$="PencilStyle"
  148. CreateIniKeyValue ini$, szName$, "Solid", "pnsolid.mbs", cmoNone
  149. CreateIniKeyValue ini$, szName$, "Chalk", "pnchalk.mbs", cmoNone
  150. CreateIniKeyValue ini$, szName$, "Colorizer", "pncolorz.mbs", cmoNone
  151. CreateIniKeyValue ini$, szName$, "Crayon", "pncrayon.mbs", cmoNone
  152. CreateIniKeyValue ini$, szName$, "Dotted", "dotted.mbs", cmoNone
  153. CreateIniKeyValue ini$, szName$, "Marker", "pnmarker.mbs", cmoNone
  154. CreateIniKeyValue ini$, szName$, "Pencil", "pnpencil.mbs", cmoNone
  155. CreateIniKeyValue ini$, szName$, "Scatter", "pnscatt.mbs", cmoNone
  156. CreateIniKeyValue ini$, szName$, "Smudgy Marker", "pnsmarkr.mbs", cmoNone
  157. CreateIniKeyValue ini$, szName$, "Solid Smear", "pnsmsld.mbs", cmoNone
  158. CreateIniKeyValue ini$, szName$, "Scatter Smear", "pnsmscat.mbs", cmoNone
  159.  
  160. END SUB
  161.  
  162.  
  163. SUB CreatePrintStyNamesEntries(ini$) STATIC
  164.  
  165. szName$="Style"
  166. CreateIniKeyValue ini$, szName$, "(None)", "None_Col.sty", cmoOverwrite
  167. CreateIniKeyValue ini$, szName$, "Cannon BJC-600", "CannonBJ.sty", cmoOverwrite
  168. CreateIniKeyValue ini$, szName$, "Fargo Primera (Dye Sub)", "FargoPri.sty", cmoOverwrite
  169. CreateIniKeyValue ini$, szName$, "Fargo Primera (Thermal)", "FargoPr0.sty", cmoOverwrite
  170. CreateIniKeyValue ini$, szName$, "Generic - BubbleJet", "GenericB.sty", cmoOverwrite
  171. CreateIniKeyValue ini$, szName$, "Generic - CMY(Thermal)", "Generic1.sty", cmoOverwrite
  172. CreateIniKeyValue ini$, szName$, "Generic - CMYK(Thermal)", "Generic.sty", cmoOverwrite
  173. CreateIniKeyValue ini$, szName$, "Generic - DeskJet", "GenericD.sty", cmoOverwrite
  174. CreateIniKeyValue ini$, szName$, "Generic - InkJet", "GenericI.sty", cmoOverwrite
  175. CreateIniKeyValue ini$, szName$, "Generic - Laser Jet", "Generic0.sty", cmoOverwrite
  176. CreateIniKeyValue ini$, szName$, "Generic - PaintJet", "GenericP.sty", cmoOverwrite
  177. CreateIniKeyValue ini$, szName$, "Generic - Slide Recorder", "Generic2.sty", cmoOverwrite
  178. CreateIniKeyValue ini$, szName$, "HP PaintJet", "HPPaintJ.sty", cmoOverwrite
  179. CreateIniKeyValue ini$, szName$, "HP Deskjet 500", "Deskjet1.sty", cmoOverwrite
  180. CreateIniKeyValue ini$, szName$, "HP DeskJet 500C", "DeskJet2.sty", cmoOverwrite
  181. CreateIniKeyValue ini$, szName$, "HP Deskjet 550C", "Deskjet5.sty", cmoOverwrite
  182. CreateIniKeyValue ini$, szName$, "HP Deskjet 560C", "Deskjet0.sty", cmoOverwrite
  183. CreateIniKeyValue ini$, szName$, "HP Desk Jet 1200C/PS", "deskjet.sty", cmoOverwrite
  184. CreateIniKeyValue ini$, szName$, "HP PaintJet XL", "PaintJe1.sty", cmoOverwrite
  185. CreateIniKeyValue ini$, szName$, "HP PaintJet 300", "PaintJe0.sty", cmoOverwrite
  186. CreateIniKeyValue ini$, szName$, "Monochrome PostScript", "monops.sty", cmoOverwrite
  187. CreateIniKeyValue ini$, szName$, "PostScript Typesetter", "typeset.sty", cmoOverwrite
  188.  
  189. szName$="Map"
  190. CreateIniKeyValue ini$, szName$, "Inverted Ramp", "INVERTED.MAP", cmoOverwrite
  191. CreateIniKeyValue ini$, szName$, "Density to Reflectance", "DENSITY.MAP", cmoOverwrite
  192. CreateIniKeyValue ini$, szName$, "Minimum Solarize", "sol_3pt.map", cmoOverwrite
  193. CreateIniKeyValue ini$, szName$, "Solarize", "Solarize.map", cmoOverwrite
  194. CreateIniKeyValue ini$, szName$, "Maximum Solarize", "sol_11pt.map", cmoOverwrite
  195. CreateIniKeyValue ini$, szName$, "Reflectance to Density", "REFLECT.MAP", cmoOverwrite
  196. CreateIniKeyValue ini$, szName$, "Ramp", "RAMP.MAP", cmoOverwrite
  197.  
  198. szName$="BGMap"
  199. CreateIniKeyValue ini$, szName$, "Black - 1 Extra Light", "BGLIGHTX.MAP", cmoOverwrite
  200. CreateIniKeyValue ini$, szName$, "Black - 2 Light", "BGLIGHT.MAP", cmoOverwrite
  201. CreateIniKeyValue ini$, szName$, "Black - 3 Medium", "BGMEDIUM.MAP", cmoOverwrite
  202. CreateIniKeyValue ini$, szName$, "Black - 4 Heavy", "BGHEAVY.MAP", cmoOverwrite
  203. CreateIniKeyValue ini$, szName$, "Black - 5 Extra Heavy", "BGHEAVYX.MAP", cmoOverwrite
  204. CreateIniKeyValue ini$, szName$, "Black - 6 Maximum", "BGMAX.MAP", cmoOverwrite
  205.  
  206. szName$="PCDTables"
  207. CreateIniKeyValue ini$, szName$, "Monitor Setup 1", "msetup1.txt", cmoNone
  208. CreateIniKeyValue ini$, szName$, "Monitor Setup 2", "msetup2.txt", cmoNone
  209. CreateIniKeyValue ini$, szName$, "Monitor Setup 3", "msetup3.txt", cmoNone
  210. CreateIniKeyValue ini$, szName$, "Monitor Setup 4", "msetup4.txt", cmoNone
  211. CreateIniKeyValue ini$, szName$, "Monitor Setup 5", "msetup5.txt", cmoNone
  212. CreateIniKeyValue ini$, szName$, "Monitor Setup 6", "msetup6.txt", cmoNone
  213. CreateIniKeyValue ini$, szName$, "Monitor Setup 7", "msetup7.txt", cmoNone
  214. CreateIniKeyValue ini$, szName$, "Monitor Setup 8", "msetup8.txt", cmoNone
  215. CreateIniKeyValue ini$, szName$, "Monitor Setup 9", "msetup9.txt", cmoNone
  216. CreateIniKeyValue ini$, szName$, "Offset Press-20% Dot", "offset.txt", cmoNone
  217. CreateIniKeyValue ini$, szName$, "Web Press-25% Dot", "web.txt", cmoNone
  218.  
  219.  
  220. END SUB
  221.  
  222.  
  223.